home *** CD-ROM | disk | FTP | other *** search
/ Shareware Super Platinum 8 / Shareware Super Platinum 8.iso / mac / PROGTOOL / LCMS.ZIP;1 / RELEVEL.COM < prev    next >
Encoding:
Text File  |  1994-06-09  |  34.4 KB  |  47 lines
  1. +¿På»éÿé¿È∂BMP024 Starting$Adjusts COBOL Data Definition Level Numbers$Specify Input File DSNAME:$Specify Work File DSNAME:$Specify Output File DSNAME:$MP024 Terminating$Specify the lowest 6 data level-numbers beyond 01 to be used in the program,$by overkeying where required: 03,05,07,09,11,13$                         DATA DIVISIONPROCEDURE DIVISIONFD SD RD 01 88006677*(END)*03,05,07,09,11,13ˇˇˇˇˇˇ1  XX02XX03XX04XX05XX06XX07ˇˇˇˇ™ 
  2.  
  3. SR∂≤ª¥Õ祠   Õ!Z[SRQ¥∞∑µ±∂≤OÕ∂≤ª¥Õ祠   Õ!YZ[SRQ¥∞∑µ±∂≤OÕ∂≤ª¥ÕçH¥    Õ!YZ[VQæπ∞ àÑ^FIɢsıY^Vç6JDÎ^Ë˝"^Ä>^#uÈ!êR≤Îê^Vç6eDË1-^ZR≤∂OË*-ZVQæπ∞ àÑ^FIɢsıY^SRQ¥∞∑µ±∂≤OÕ∂≤ª¥Õçc¥    Õ!YZ[Vç6¡DÎ^ËÜ"^Ä>^#uÈ™êR≤Îê^Vç6‹DË∫,^ZVQæπ∞ àÑ^FIɢsıY^SRQ¥∞∑µ±∂≤OÕ∂≤ª¥Õç}¥    Õ!YZ[Vç6/EÎ^Ë"^Ä>^#uÈ<êR≤Îê^Vç6JEËL,^ZR≤∂NËE,ZSRQ¥∞∑µ±∂≤OÕ∂≤ª¥Õç´¥    Õ!YZ[SRQ¥∞∑µ±∂≤OÕ∂≤ª¥Õ篥    Õ!YZ[VQæπ∞ àÑ^FIɢsıY^VQæπɢuπäÑãàÑ^FIɢsÒY^Vç6EÎ^ËW!^ËÿVQæπc∞ àÑ+FIɢsıY^VQæπP∞ àÑ¥FIɢsıY^VQæπc∞ àÑ|FIɢsıY^VQæπÄ>∞àÑCFIɢsıY^Ë`Ä>+EuÈêVQæπɢuπÎêFäѪ:ÑQwrIɢuÌ¥Îê¥Îê¥Y^ĸuÎEêêVQæπɢuπÎêFäѪ:Ñ^wrIɢuÌ¥Îê¥Îê¥Y^ĸuÈ=êËÓÈrˇR≤∂NË¥*ZËflΔ¯2Ë¡Ä>+EuÈzêVQæπɢuπÎêFäѪ:Ñ^wrIɢuÌ¥Îê¥Îê¥Y^ĸuÈ€êVQæπɢuπÎêFäѪ:ÑpwrIɢuÌ¥Îê¥Îê¥Y^ĸuÈ    êVQæπɢuπÎêFäѪ:ÑswrIɢuÌ¥Îê¥Îê¥Y^ĸuÈÃêVQæπɢuπÎêFäѪ:ÑvwrIɢuÌ¥Îê¥Îê¥Y^ĸuÈèêVQæπɢuπÎêFäѪ:ÑywrIɢuÌ¥Îê¥Îê¥Y^ĸuÎXêêË5Ȫ˛Ë|Ä>+EuÈ5êVQæπɢuπÎêFäѪ:Ñ=wrIɢuÌ¥Îê¥Îê¥Y^ĸtÈ˛êˉÎ∞É9 VQæπɢuπäÑ9àÑZFIɢsÒY^ËπËÄ>+EuȺêVQæπɢuπÎêFäѪ:Ñ=wrIɢuÌ¥Îê¥Îê¥Y^ĸtÎêêË É>\uÎêêË´ËZÎüËëÈÈ˝VQæπPɢuπäÑ¥àÑ®FIɢsÒY^VQæπP∞ àÑFIɢsıY^VQæπɢuπäÑÑàÑFIɢsÒY^R≤ÎêRVç6|IË!(^ZR≤Ë(ZR≤∂OË
  4. (ZË]Ä>,EuÈïêVQæπɢuπÎêFäÑ¥:ÑÑwrIɢuÌ¥Îê¥Îê¥Y^ĸuÈXêVQæπɢuπÎêFäÑZ:ÑúwrIɢuÌ¥Îê¥Îê¥Y^ĸuÎBêêÉ>ZuÎ,êêç.C.ZVQæπ É˘uπäàÑéFIɢsÛY^Î êÉ>\tÎêêËmÈ2ˇVQæπɢuπäÑ\àÑ;FIɢsÒY^ã6;äѪ¢?ˇ;ã6;äѪ¢@çéÎêÉ√VQæπɢuπäàÑÆFIɢsÛY^VQæπɢuπÎêFäÑ?:ÑÆwrIɢuÌ¥Îê¥Îê¥Y^ĸuΣêĸuÈRˇêçª;KVQæπɢuπäÑ∞àFIɢsÛY^È&ˇR≤Ëj&ZVQæπPɢuπäÑ®àÑ¥FIɢsÒY^Δ¯3ËfËMÄ>+EuÎêêËUÎÌR≤Ë'&ZR≤Ë &ZSRQ¥∞∑µ±∂≤OÕ∂≤ª¥Õçô¥    Õ!YZ[∞¥LÕ!Ä>+EuÈêR≤Îê¥P+Vç6ÕKËÀ%^ZÄ>+EuÈ‚êVQæπɢuπäÑúàÑZFIɢsÒY^Ä>∫ tÈ∑êVQæπAɢuπÎêFäѪ:Ñ=wrIɢuÌ¥Îê¥Îê¥Y^ĸuÎ{êêVQæπɢuπÎêFäѪ:Ñ=wrIɢuÌ¥Îê¥Îê¥Y^ĸuÎ=êêΔ) Ä>ª tÎ-êêVWæAɲrNÄ>ª uøäÖºàÖªG;˛uÛΔѪ Î‚_^√Ä>¯2uÎêêË˙ÈÏ˛Ä>∫-tÎêêÄ>)XtÎêêË8ËxÈÕ˛Ä>,EuÈŒêR≤ÎêR,Vç6 MËç$^ZÄ>,EuÈ≠êVQæπɢuπÎêFäÑ:ÑÑwrIɢuÌ¥Îê¥Îê¥Y^ĸuÎqêêVQæπJɢuπäÑàÑ∫FIɢsÒY^Ë¿ËÑÄ>∫ tÎ@êêVQæπAɢuπÎêFäѪ:Ñ=wrIɢuÌ¥Îê¥Îê¥Y^ĸuÎêê√˸È,ˇçíÎêÉ√;≤rÎ#êêVQæπɢuπäÑ¢àFIɢsÛY^Γ√Ä>)XtÎêêËȱ«-VQæπ∞ àÑ?FIɢsıY^ˇ-É>-?vÈÜêã6-ĺª uΉêç.ªÓVQæπɢuπäàÑ?FIɢsÛY^Ä>A tÈHêÄ>?0sÈ=êÄ>?9vÈ2êÄ>@0sÈ'êÄ>@9vÈêVQæπɢuπÎêFäÑ?:Ñ|wrIɢuÌ¥Îê¥Îê¥Y^ĸtÎêêË6ÈÿVQæπɢuπÎêFäÑ?:Ñ~wrIɢuÌ¥Îê¥Îê¥Y^ĸuÈúêVQæπɢuπÎêFäÑ?:ÑÄwrIɢuÌ¥Îê¥Îê¥Y^ĸuÎ`êêVQæπɢuπÎêFäÑ?:ÑÇwrIɢuÌ¥Îê¥Îê¥Y^ĸuÎ#êêVQæπɢuπäÑ-àÑ\FIɢsÒY^√Vç6ŸO΢˘ËD^VQæπ∞ àÑ FIɢsıY^Vç6P΢ Ë^VQæπɢuπäÑ àÑ¥FIɢsÒY^VWæɲrNĺ¥ uã˛äÖ≥àÖ¥OɡuÚΔ¥0΂_^Δπ0R≤Îê¥PVç6`PË=!^Z√VQæπJɢuπäÑ∫àÑFIɢsÒY^ËΔË:R≤ÎêRVç6úPË!^Z√Ë+˝æç.íFɲbvÈ¿êĺ+ uÎÌêãΔ@܇£)Vç6ÿPÎ'Ë˚^VQæπ∞ àÑ FIɢsıY^Vç6˛PÎ Ë^VQæπɢuπäÑ àÑÆFIɢsÒY^VWæɲrNĺÆ uã˛äÖ≠àÖÆOɡuÚΔÆ0΂_^VQæπɢuπäÑÆàFIɢsÛY^É≈;.≤sÈ8ˇêVQæπc∞ àÑ+FIɢsıY^ç.C.9VQæπ É˘uπäÑéàFIɢsÛY^√ç.ª.\VQæπ∞ àÑ FIɢsıY^Δ VQæπɢuπäàÑ FIɢsÛY^Vç6RÎ Ë^Vç6RÎ'Ëu^°)܇ãNΔÑ+X√Δ)XæENɲuÎêêĺª uÎÌêĺª.tÎêêΔ) √†ZVWQÎ0123456789ABCDEF¥ãÅÊã¯ÉÁ±”Óä§aRäÖaRY_^à&¢†[VWQÎ0123456789ABCDEF¥ãÅÊã¯ÉÁ±”Óä§úRäÖúRY_^à&¢    √†\VWQÎ0123456789ABCDEF¥ãÅÊã¯ÉÁ±”Óä§ÿRäÖÿRY_^à&
  5. ¢ †]VWQÎ0123456789ABCDEF¥ãÅÊã¯ÉÁ±”Óä§SäÖSY_^à& ¢√ä&†VQÎê†∞¿–‡
  6. «SSĸArĉà&SSã6SSä§USÎêĉ±“‰«SS<Ar$¢SSã6SSäÑ\SÎê$
  7. ƒY^¢Zä&†    VQÎê†∞¿–‡
  8. «∂SĸArĉà&∂Sã6∂Sä§∏SÎêĉ±“‰«∂S<Ar$¢∂Sã6∂SäÑøSÎê$
  9. ƒY^¢[√ä&
  10. † VQÎê†∞¿–‡
  11. «TĸArĉà&Tã6Tä§TÎêĉ±“‰«T<Ar$¢Tã6TäÑ#TÎê$
  12. ƒY^¢\ä& †VQÎê†∞¿–‡
  13. «}TĸArĉà&}Tã6}Tä§TÎêĉ±“‰«}T<Ar$¢}Tã6}TäÑÜTÎê$
  14. ƒY^¢]√çîç.^πÎêAɢrÎ(êêÉ√É≈VQæπɢuπ>äàFIɢsÙY^Ζ√ÈpÈ[È›È]ÈßÈÈïÈ<    _^]ZY[√æU—UøU“U
  15. (2<FPZ        !$' $(26 %05@E$06BHT!(5BIVc$2@HVdr    '6ETcrÅSQRUVWª±.ä.àá?UFC˛…ĢuÔË    Ë‡Ë˝.Ä>ÅVuȶê.ΔbV.ΔâV.Δ—U .†æU¥ãËøÎêMÉ˝tn.äÜæU<.t<-t <0rz<:wv$.¢âV.˛bV.˛àVÎ êË…ÎÕ˓λMÉ˝t6.äÜæU<.t#<-t$<0rB<:w>±“‡.
  16. âV.¢âV.˛bVË´ÎñËçÎ…Ëñ΃.†àV<tËîËIÈœ˝.†—U Ä.¢—UÎÓ.†—U @.¢—U΂SQRUVWª±.ä.àá?UFC˛…ĢuÔË)ç—Uπ∞0.àCIɢuˆç‰Uπ∞ .àCIɢuˆËE.†æU$.¢bV.†æU$ <u.˛åV.†æU$Ä<t.˛çV.†æU$@<t.˛ãV.«éV.«êV.†åV<t.†çV<t.ãêV.Δá—U-K.âêV.†bV<t.†ãV<t.°êVµ.äbV+¡ã¯.ΔÖ—U..ã>éVɡt..äÖæU$ 0.¢âVË€.ã>éV.äÖæU±“Ë 0.¢âV˃.ˇéVλø±ÎêG˛….äÖ—U<0tÙO.â>êV< uÉÔ.ΔÖ—U.â>xVÎFê.ΔâV.†åV<t.†çV<u.ΔâV-.ã>êV.†âV<-u.àÖ—UO.â>êV˛¡.àáV.àç—U.â>xVË#È2¸SQRUVWª±.ä.àá?UFC˛…ĢuÔ˧ËÊË=Ëï.†{V<tÈéËœ Ë∞.†|V<t.†`V4 .¢`VÈÑ.†_V<u
  17. .†`V<t"u.†`V<uÎê.ΔaV ÈíÈï.ΔaV ÈåÈÉêSQRUVWª±.ä.àá?UFC˛…ĢuÔË ËbËπË.†{V<tÈ
  18. ËK Ë,.†|V<t.†_V4 .¢_VÈ|ˇ.†_V<u
  19. .†`V<t!u.†`V<ut .ΔaV ÎêÎê.ΔaV ÎêÎêËÌ ÎêËøΩÎ
  20. êÉÔMÉ˝t    .äÜ)V<tÓã«.¢eVÉÌ.â.xV∏.†eV<t?ãË.ã>xV.äÖ)V<tÉ˝t .†zV @.¢zVÉÌã≈.¢eV.ˇxVɡtOΓ.†zV Ä.¢zV.†aV<t∞ .
  21. zV.
  22. eV.ã>xV.àÖ)VVQæπ.äÑ)V.àщUFIɢ}ÔY^ˬÈq˙∞ˇ.¢)V.«xVÎÎSQRUVWª±.ä.àá?UFC˛…ĢuÔË‘ËËmË≈.†{V<tÈˡ
  23. .«nV.«rVæFɲt    .äÑ—U<tÒ.â6vV.ã>nV.;>vV|B.äÖ—U$.¢]VËÌËuË©Ë’.ˇrV.ã>nV.äÖ—Uπ“Ë.¢]VË…ËÊËÖ˱.ˇnVÎ≤.†_V.:`Vu.ΔaV ¥µ.†cV.ädV¡.¢eV.«xV    .«pVÎê.Δ}V.ˇpV.ˇxVËÀ.Ä>}Vt(¥.†eVãɲtNɲtNãΔ.¢eV.ÄÜV@Î√.ÄÜVÄ.ˇxV.ã6xV.†ÜV.
  24. eV.
  25. aV.àÑKVËûÈ˘.Δ‰UˇÎÚSQRUVWª±.ä.àá?UFC˛…ĢuÔËàË Ë!Ëy.†{V<tÎΔË}    Ë±    ËËxË'.Ä>ÑVtÈX.Ä>ÖVtÈ5.«jVË6.Ä>ÄVtÎ;ê.É>jVuÈË.Ä>ÄVtËÍÎ$êË»Îfl.É>jVrÈ˸.Ä>ÄVtÎêËΔ΂ËvË⁄Ëí.Ä>äVtÎ$êË’.Ä>ÄVt·Ë¢.É>jVsËø.Ä>ÄVtÍÎ….Δ9VæFɲ    s.ĺ)VtÚ.â6fVÉΔ.â6hVÉÓπ”Ê.â6jVãΔ.:eVs    .ÄÜV@Î)ê.ã6hVɲ    r.ĺ)Vu.ˇfV.ˇhV.ˇjV.ˇjVÎÿ.ã6fVN.â6xV.†ÜV.
  26. aV.
  27. jV.àÑ)VVQæπ.äÑ)V.àÑKVFIɢ}ÔY^Ë
  28. Èä˜∞ˇÎê∞Ä.¢)V.«xVÎÀ∞pÎÔ∞ ÎÎSQRUVWª±.ä.àá?UFC˛…ĢuÔˇË"ËyË—.Ä>{VtÎ\êË ËræFɲs.ä§æU.:§—Uw    r ÎÍ¥EÎê¥HÎê¥L.Ä>_V t .Ä>`V t*Î ê.Ä>`V tÎêĸHtĸLtÎêäƒÎê∞XÎê∞HÎê∞LÎê∞E.ã6CU.àȃˆSQRUVWª±.ä.àá?UFC˛…ĢuÔË6ËxËœË'.Ä>{VtÈ ¸ËaËBËL.ΔeV±æFɲrÈïê.äÑ—U$<u˛¡.äÑ—U$<u˛¡Î⁄ã˛ÉÔ    .â>xV.àeV.äÑ—U$<t.äÑ)V$.àÑ)V∞Fɲ}.àÑ)VÎÛ.†eV$<t9VQæπ.äÑ)V.àÑVFIɢ}ÔY^ËûVQæπ.äÑV.àÑ)VFIɢ}ÔY^.†_V.¢aV.ã6xV.†aV.
  29. eV.àÑ)VVQæπ.äÑ)V.àщUFIɢ}ÔY^ËÙÈ£ıø.ã6?U.ä.àÖæUɡtGFÎÔ√ø.ã6AU.äÖ—U.àɡtGFÎÔ√∞øπ‘.àÖæUGIɢuÙ√.†—U.
  30. bV.¢—U√.†—U$fl.¢—U√.†âV.àÖ—UO.ΔâV.ΔàV√.ã6?Uø.ä.àÖæUFGɡ    rÒ√.ã6AU.ã>xV.äç—U˛¡.äÖ—U.àFG˛…ĢuÔ√.ã>êV.äÖ—U<.uO.†âV.àÖ—UO.â>êV√.ã6AU±    ø.ä.àÖ—U˛…ĢtFGÎÌ√.ã6CU±    .ã>xV.äÖ‰U.à˛…ĢtFGÎÌ√øGɡs.äÖæU.:Ö—UtÓr.˛ÉV√øGɡt˙ɡ't.äÖæU$<êw.äÖæU$<    wΛ.˛{V√ËÉ˱ˇ.†ÉV<t9VQæπ.äÑæU.àјUFIɢ}ÔY^VQæπ.äÑ—U.àÑVFIɢ}ÔY^Î?ê.˛|VVQæπ.äÑ—U.àјUFIɢ}ÔY^VQæπ.äÑæU.àÑVFIɢ}ÔY^ËÕ√.†cV<t.ãKUË.†dV<t.ãMUË√.¢áV.«fV.«hVÎê.˛áV.Ä>áVt.ã.fV.ã>hV.ˇfV.ˇhVÎê.ΔG.ΔG.ΔG√MOË Ë#ɡrøÎÒ√.ΔâVɡráı.äáı±“‡.¢âV√.䱓Ë.
  31. âV.à√¥.†]Vã¯.äÖPU.\Vã.äÑZU.¢^V√Ëf.«lV.°rV.£pV.ã6lVɲtL.äÑæU$.¢\VË∏ˇ.†^V.ã6pV.àÑ)V.ã6lV.ˇlV.äÑæUπ“Ë.¢\VËèˇ.†^V.ã6pV.ˇpV.àÑ:VΙ√.Δ)VVQæπ!.äÑ)V.àÑ*VFIɢ}ÔY^√æøF.äÑ:V±“‡.¢âVG.;6rVs.äÖ:V±“Ë.
  32. âV.àÑ:VÎ’.àÑ:V√¯æÎêù.äÑ)V.Ñ:V'.àÑ)VúNɲuËù.†)V.:V'.¢)V√¯æÎêù.äÑKV.Ñ)V'.àÑKVúNɲuËù.†KV.)V'.¢KV√.ã>rVG.ã6rV.äÖ)V±“Ë.¢âVɲt.äÑ)V±“‡.
  33. âV.àÖ)VONÎ◊.àÖ)V√.ã6pV.äÑKV<uNɲuÒ.†KV<t.Δ}V√ËŒ.ã6CU±    .ã>xV.äÖKV.à˛…ĢtFGÎÌ√VQæπ.äÑæU.àјUFIɢ}ÔY^VQæπ.äÑ—U.àÑVFIɢ}ÔY^.†cV.:dVs.†dV.¢eV.†_V.:`Vu.ΔaV √øæ.äÖ˜U±“Ë.¢âVɲt.äјU±“‡.
  34. âV.àÖ˜UONÎ◊.àÖ˜U√.ΔäVæF.äјU<uɲrÒÎê.ΔäV√æFɲs%.äјU<tÒ.â6tVæFɲs.äÑV<tÒ.â6vV√.ΔÄVøGɡs.äÖ˜U.:ÖVtÓr.˛ÄV√æøF.äÑV±“‡.¢âVGɲs.äÖV±“Ë.
  35. âV.àÑVÎ◊.àÑV√øæ.äÖV±“Ë.¢âVɲt.äÑV±“‡.
  36. âV.àÖVONÎ◊.àÖV√¯æÎêù.äјU.ÑV/.àјUúNɲuËù.†˜U.V/.¢˜U√Ëdˇ.Ä>Vt .˛V.ˇjV√.˛V√Ë}ˇ.Ä>Vt.˛V√.˛V.ˇjV√.ã6jV.Ä>Vt.äÑ)V.àÑ)V√.äÑ)V.àÑ)V√æFɲ    s .äÑæU<tÒÎê.ΔÑVæFɲ    s .äÑ—U<tÒÎê.ΔÖV√.†æU$ .¢_V.†æU$.¢cV.†—U$ .¢`V.†—U$.¢dV∞.¢æU.¢—UË&√.†_V.ä&`V.à&_V.¢`V.†cV.ä&dV.à&cV.¢dV√Ëkˇ.Ä>ÑVt.Δ_V .Ä>ÖVt.Δ`V √.ã6xVF±ÎêĢtF.ĺKVu˛…ÎÓ.ã6xV.äÑKV  .àÑKV√.ä.æUÄ˝r6Ä˝w1±æΠ   êF˛ÕÄ˝t.ĺæU/wÎÓ.ĺæU9wÊ˛¡Î‚ĢrĢw√.ΔÅV√¯æÎêù.äјU.ÑV'.àÑ)VúNɲuËùs
  37. .†zV Ä.¢zV√¯æÎêù.äјU.ÑV/.àÑ)VúNɲuËù√Î#êÈYÈvȆȃÈË$SQRUVWSQª±Ģt .ä.àábgFC˛…ĢuÔY[.Δig.°fg.¢jg.ã6bg.ãdgË„∏ÕĸtˆÄ¸uÈ.êĸtaĸMt8ĸKtWĸSuÎuêê<    uÈfiê<uÈÓê< sÈêê<~vÈàê.à.¢sgË}.äig.:jgrÈìê.˛igF.ãdg˛¬.âdgÎÑ.äig.:hgwÈpˇê.˛igN.ãdg˛ .âdgÈ_ˇ.äig.:hgwÈKˇê.˛igN.ãdg˛ .âdgË Δ .Δsg ËÈ&ˇ.É>kguÈ#ˇê.ã6mg.à$.àD_^]ZY[X.°kgP√.É>oguȈ˛ê_^]ZY[X.°ogP√.É>oguÎ∏ê_^]ZY[X.°ogP√.É>qguΆê_^]ZY[X.°qgP√_^]ZY[√SQRUVWSQª±Ģt .ä.àákgFC˛…ĢuÔY[ΓSQRUVWSQª±Ģt .ä.àáogFC˛…ĢuÔY[δSQRUVWSQª±Ä˘t .ä.àákgFC˛…ĢuÔY[.«kg.«og.«qgÈnˇå»éÿçsg¥    Õ!Xéÿ√¥∑Õ√.âüi¥ÕQVæπD₲Nɲuı^Y¥Õ√Ë&.ãüiɡtO&ä<tË[FÎÌ∞ËS∞
  38. ËNË&√å¿.£°i.â£i.â.•i.âßi.â©i.â>´i.â6≠i√.°°ié¿.ã£i.ã.•i.ãßi.ã©i.ã>´i.ã6≠i√¥Õˆƒ@uÎ
  39. ê¥ÕˆƒÄt˜√ !GH6G st$ 6á     hCTV 4!w( gàd 3UD2 wr 8Ü C     qR Öv RBà &!D r U6 'h cÑ Åí @ñ  H $  V ( d 2     SQRUVWª±.ä.àá`jFC˛…ĢuÔVQæπ∞.àÑmjFIɢsÙY^Ë_.Δdj Vç6◊kÎdjqj÷kËRÈ^.Ä>÷kHuÈ„êVç6ıkÎdjçjÙkË4È^.Ä>ÙkLuÎêê.†mj.¢mjVç6lÎdjçjdjËÈ^Î≈Vç60lÎdj±j/lˢË^.Ä>/lLuÎêê.†mj.¢mjVç6WlÎdj±jdjË…Ë^Î≈Vç6klÎdj’jjlËæË^.Ä>jlLuÎêê.†nj.¢njVç6ílÎdj’jdjËéË^Î≈Vç6¶lÎdj˘j•lËÉË^.Ä>•lLuÎêê.†nj.¢njVç6ÕlÎdj˘jdjËSË^Î≈Vç6·lÎdjk‡lËHË^.Ä>‡lLuÎêê.†oj.¢ojVç6mÎdjkdjËË^Î≈Vç6mÎdjAkmËË^.Ä>mLuÎêê.†oj.¢ojVç6CmÎdjAkdjË›Á^Î≈Vç6WmÎdjekVmË“Á^.Ä>VmLuÎêê.†pj.¢pjVç6~mÎdjekdjË¢Á^Î≈Vç6ímÎdjâkëmËóÁ^.Ä>ëmLuÎêê.†pj.¢pjVç6πmÎdjâkdjËgÁ^Î≈Ë}_^]ZY[√.ãbj.ΔˇÎÓSQRUVWª±.ä.àá`jFC˛…ĢuÔVQæπ    ∞.àÑdjFIɢsÙY^.Δdj ËK.ˆmj@tVç6&nÎdj{jdj˘Ê^.ˆmj tVç6?nÎdjÑjdjËfiÊ^.ˆmjtVç6XnÎdjçjdjË≈Ê^.ˆmjtVç6qnÎdjñjdj˨Ê^.ˆmjtVç6änÎdjüjdjËìÊ^.ˆmjtVç6£nÎdj®jdjËzÊ^.ˆmjtVç6ºnÎdj±jdjËaÊ^.ˆnjÄtVç6’nÎdj∫jdjËHÊ^.ˆnj@tVç6ÓnÎdj√jdjË/Ê^.ˆnj tVç6oÎdjÃjdjËÊ^.ˆnjtVç6 oÎdj’jdjË˝Â^.ˆnjtVç69oÎdjfijdjˉÂ^.ˆnjtVç6RoÎdjÁjdjËÀÂ^.ˆnjtVç6koÎdjjdjË≤Â^.ˆnjtVç6ÑoÎdj˘jdjËôÂ^.ˆojÄtVç6ùoÎdjkdjËÄÂ^.ˆoj@tVç6∂oÎdj kdjËgÂ^.ˆoj tVç6œoÎdjkdjËNÂ^.ˆojtVç6ËoÎdjkdjË5Â^.ˆojtVç6pÎdj&kdjËÂ^.ˆojtVç6pÎdj/kdjËÂ^.ˆojtVç63pÎdj8kdjË͉^.ˆojtVç6LpÎdjAkdjË—‰^.ˆpjÄtVç6epÎdjJkdjË∏‰^.ˆpj@tVç6~pÎdjSkdjËü‰^.ˆpj tVç6ópÎdj\kdjË܉^.ˆpjtVç6∞pÎdjekdjËm‰^.ˆpjtVç6…pÎdjnkdjËT‰^.ˆpjtVç6‚pÎdjwkdjË;‰^.ˆpjtVç6˚pÎdjÄkdjË"‰^.ˆpjtVç6qÎdjâkdjË    ‰^Ë^_^]ZY[√.ãbjæ±    .ä.àÑdj˛…ĢtFÎÓ√.ã`jæ±.äÑmj.à˛…Ä˘tFÎÓ√.ãbjæ±.ä.àÑmj˛…ĢtFÎÓ√.ã`jæ±    .äÑdj.à˛…Ä˘tFÎÓ√È Èÿ    È˜ Èñ Èˇ È∏_^]ZY[√                                                   CCC   000Invalid File Specification By Calling Program$Program Terminated By SR014 (QSAM)$No Space For FILE1$FILE1 Dataset Not Found$Duplicate OPEN For FILE1$GET Issued For Unopened FILE1$PUT Issued For Unopened FILE1$FILE1 PUT Out Of Space$CLOSE Issued For Unopened FILE1$Invalid Disposition Code Specified For File OPEN$GET issued for FILE1 after EOD.$SQRUVWSQª±Ģt .ä.àáπqFC˛…ĢuÔY[.â3rËπ
  40. .°3r<uÎêê<uÈçê<uÈêÈ˘VQæπ ∞ .àѬqFIɢsÙY^VWQæø±.Ä>6r:u,.†5r$.¢¡qÉΔÄÈÎêGF˛…Ģt4.ĺ5r t,.ĺ5r.t .äÑ5r.àÖ¡q΀ø    ±F.äÑ5r.àÖ¡qG˛…ĢuÌY_^È6˜VQæπ ∞ .àÑËqFIɢsÙY^VWQæø±.Ä>6r:u,.†5r$.¢ÁqÉΔÄÈÎêGF˛…Ģt4.ĺ5r t,.ĺ5r.t .äÑ5r.àÖÁq΀ø    ±F.äÑ5r.àÖÁqG˛…ĢuÌY_^ȵˆVQæπ ∞ .àÑrFIɢsÙY^VWQæø±.Ä>6r:u,.†5r$.¢rÉΔÄÈÎêGF˛…Ģt4.ĺ5r t,.ĺ5r.t .äÑ5r.àÖr΀ø    ±F.äÑ5r.àÖrG˛…ĢuÌY_^È4ˆSQRUVWSQª±Ä˘t .ä.àáπqFC˛…ĢuÔY[.â3rIJOuÎêêIJNuÎêêÈ7Ä˙uÎêêÄ˙uÎ}êêÄ˙uÈ‚êÈ.Ä>DrOuÈáêIJOuÎ/êêRSå»éÿç¡q¥Õ!ãÿXéÿÄ˚tÈ+ê∏.£Õq.¢·q[ZÈ RSå»éÿç¡q¥Õ!ãÿXéÿÄ˚tÈê∏.£Õq.¢·q[ZÈfi.Ä>ErOuÈ!êIJOuÎ/êêRSå»éÿçÁq¥Õ!ãÿXéÿÄ˚tÈŒê∏.£Ûq.¢r[ZȃRSå»éÿçÁq¥Õ!ãÿXéÿÄ˚tÈ™ê∏.£Ûq.¢r[ZÈó.Ä>FrOuȪêIJOuÎ/êêRSå»éÿçr¥Õ!ãÿXéÿÄ˚tÈqê∏.£r.¢-r[ZÎ~êRSå»éÿçr¥Õ!ãÿXéÿÄ˚tÈMê∏.£r.¢-r[ZÎQê.ΔDrOVQæπ∞.àÑVrFIɢsÙY^.«MrÈbÙ.ΔErOVQæπ∞.àÑVtFIɢsÙY^.«OrÈ:Ù.ΔFrOVQæπ∞.àÑVvFIɢsÙY^.«QrÈÙSQRUVWSQª±Ģt .ä.àáπqFC˛…ĢuÔY[.â3rÄ˙uÎêêÄ˙uÎ,êêÄ˙uÎAêêÈ .ã>Ωq.Ä=EtÎ êê.Δ¢y1È:Ë–ȨÛ.ã>Ωq.Ä=EtÎ êê.Δ¢y2ÈËßÈéÛ.ã>Ωq.Ä=EtÎ êê.Δ¢y3È˛Ë~ÈpÛSQRUVWSQª±Ģt .ä.àáπqFC˛…ĢuÔY[.â3rÄ˙uÎêêÄ˙uÎêêÄ˙uÎêêÈjË%    .ΔGrXÈÛËô    .ΔHrXÈÛË
  41. .ΔIrXÈÛSQRUVWSQª±Ä˘t .ä.àáπqFC˛…ĢuÔY[.â3rÄ˙uÎêêÄ˙uÈâêÄ˙uȸêÈ˛.Ä>DrCuÈ€ê.Ä>GrXtÎ?êê.ã>MrÅˇrÎêê.ΔÖVrRå»éÿçVr¥Õ!∏.£œqç¡q¥Õ!Z<tÎê¥Rå»éÿç¡q¥Õ!XéÿZ.ΔDrC.ΔGr .ΔJr0È@Ú.Ä>ErCuÈhê.Ä>HrXtÎ?êê.ã>OrÅˇrÎêê.ΔÖVtRå»éÿçVt¥Õ!∏.£ıqçÁq¥Õ!Z<tÎê¥Rå»éÿçÁq¥Õ!XéÿZ.ΔErC.ΔHr .ΔKr0ȃÒ.Ä>FrCuÈıê.Ä>IrXtÎ?êê.ã>QrÅˇrÎêê.ΔÖVvRå»éÿçVv¥Õ!∏.£rçr¥Õ!Z<tÎê¥Rå»éÿçr¥Õ!XéÿZ.ΔFrC.ΔIr .ΔLr0ÈHÒSQRUVWSQª±Ä˘t .ä.àáπqFC˛…ĢuÔY[å»éÿ.â3rÄ˙uÎêêÄ˙uΠêêÄ˙uÎ)êêÎ>ê.Ä>DrCtÎ-êê∫¡qÎ"ê.Ä>ErCtÎêê∫ÁqÎê.Ä>FrCtΠ   êê∫r¥Õ!XéÿÈæSRQV¥∞∑µ±∂≤OÕæ∂≤Îê˛¬Fª¥Õ.äÑVx<$t ≥π¥    Õ΂^YZ[È.Δ∏x1È=.Δæx1Èw.Δ∏x2È+.Δæx2Èe.Δ∏x3È.Δæx3ÈS.ΔÈx1Èç.ΔÈx2ÈÑ.ΔÈx3È{.Δy1ȵ.Δy2Ȩ.Δy3È£.Δ%y1È›.Δ%y2È‘.Δ%y3ÈÀ.Δ+y1XÈ.Δ+y2XÈ˙.Δ+y3XÈ.Δ\y1È*.Δ\y2È!.Δ\y3ÈSRQV¥∞∑µ±∂≤OÕæ∂≤Îê˛¬Fª¥Õ.äÑ^y<$t ≥π¥    Õ΂^YZ[ÈSRQV¥∞∑µ±∂≤OÕæ∂≤Îê˛¬Fª¥Õ.äÑèy<$t ≥π¥    Õ΂^YZ[È“SRQV¥∞∑µ±∂≤OÕæ∂≤Îê˛¬Fª¥Õ.äÑßx<$t ≥π¥    Õ΂^YZ[ÈèSRQV¥∞∑µ±∂≤OÕæ∂≤Îê˛¬Fª¥Õ.äÑ∫x<$t ≥π¥    Õ΂^YZ[ÈLSRQV¥∞∑µ±∂≤OÕæ∂≤Îê˛¬Fª¥Õ.äÑ“x<$t ≥π¥    Õ΂^YZ[È    SRQV¥∞∑µ±∂≤OÕæ∂≤Îê˛¬Fª¥Õ.äÑÎx<$t ≥π¥    Õ΂^YZ[ÈΔSRQV¥∞∑µ±∂≤OÕæ∂≤Îê˛¬Fª¥Õ.äÑ    y<$t ≥π¥    Õ΂^YZ[ÈÉSRQV¥∞∑µ±∂≤OÕæ∂≤Îê˛¬Fª¥Õ.äÑ'y<$t ≥π¥    Õ΂^YZ[ÎAêSRQV¥∞∑µ±∂≤OÕæ∂≤Îê˛¬Fª¥Õ.äÑ>y<$t ≥π¥    Õ΂^YZ[SRQV¥∞∑µ±∂≤OÕæ∂≤Îê˛¬Fª¥Õ.äÑÑx<$t ≥π¥    Õ΂^YZ[∞¥LÕ!VQæπ∞ .àÑ5rFIɢsÙY^ø.ã6πq.ä.àÖ5r< uÎêêɡuÎêêGF΄√Ë÷.ãªq.Ä>DrOtÈ¢¸ê.Ä>GrPuÎêê.Ä>JrEuÎ~êêË .«Mr.ΔGrP.ã6Mr.ã>πqÎ êGIɢ}Îcêê.äÑVr<uÎ0êê<
  42. uÎKêê<uÎ9êê<uÎ1êê.àFÅ˛s΃êGI.â>πqÎëÉΔÅ˛sÎêê.ΔGr .â6Mr√.ã>Ωq.ΔE√FÎü.äÑVr<uÎêêFÅ˛sÎÍêËkΉÉΔÅ˛sÎêêËY.äÑVr<vÎêêF.â6Mr√Ë·.ãªq.Ä>ErOtÈ∂˚ê.Ä>HrPuÎêê.Ä>KrEuÎ~êêËK.«Or.ΔHrP.ã6Or.ã>πqÎ êGIɢ}Îcêê.äÑVt<uÎ0êê<
  43. uÎKêê<uÎ9êê<uÎ1êê.àFÅ˛s΃êGI.â>πqÎëÉΔÅ˛sÎêê.ΔHr .â6Or√.ã>Ωq.ΔE√FÎü.äÑVt<uÎêêFÅ˛sÎÍêË´ΉÉΔÅ˛sÎêêËô.äÑVt<vÎêêF.â6Or√ËÏ.ãªq.Ä>FrOtÈ ˙ê.Ä>IrPuÎêê.Ä>LrEuÎ~êêËã.«Qr.ΔIrP.ã6Qr.ã>πqÎ êGIɢ}Îcêê.äÑVv<uÎ0êê<
  44. uÎKêê<uÎ9êê<uÎ1êê.àFÅ˛s΃êGI.â>πqÎëÉΔÅ˛sÎêê.ΔIr .â6Qr√.ã>Ωq.ΔE√FÎü.äÑVv<uÎêêFÅ˛sÎÍêËÎΉÉΔÅ˛sÎêêËŸ.äÑVv<vÎêêF.â6Qr√.ãªq.Ä>DrOtÈ·˘ê.ã>Mr.ã6πq.ä.àÖVr<uÎ/êêFGIɢ}ÎêêÅˇs΋êË=Î÷ÅˇsÎêêË..ΔÖVrGÅˇsÎêêË.ΔÖVr
  45. GÅˇsÎêêË.â>Mr√.ãªq.Ä>ErOtÈj˘ê.ã>Or.ã6πq.ä.àÖVt<uÎ/êêFGIɢ}ÎêêÅˇs΋êËÎ÷ÅˇsÎêê˘.ΔÖVtGÅˇsÎêêË„.ΔÖVt
  46. GÅˇsÎêêËœ.â>Or√.ãªq.Ä>FrOtÈÛ¯ê.ã>Qr.ã6πq.ä.àÖVv<uÎ/êêFGIɢ}ÎêêÅˇs΋êËœÎ÷ÅˇsÎêêË¿.ΔÖVvGÅˇsÎêê˨.ΔÖVv
  47. GÅˇsÎêêËò.â>Qr√Rå»éÿçVr¥Õ!∏.£œqç¡q¥Õ!Z<tÈf¯¥VQæπ∞.àÑVrFIɢsÙY^ø.â>Mr√Rå»éÿçVt¥Õ!∏.£ıqçÁq¥Õ!Z<tÈ'¯¥VQæπ∞.àÑVtFIɢsÙY^ø.â>Or√Rå»éÿçVv¥Õ!∏.£rçr¥Õ!Z<tÈ˘¥VQæπ∞.àÑVvFIɢsÙY^ø.â>Qr√æRå»éÿçVr¥Õ!∏.£œqç¡q¥Õ!Z<tÎê¥Îê.ΔJrE√æRå»éÿçVt¥Õ!∏.£ıqçÁq¥Õ!Z<tÎê¥Îê.ΔKrE√æRå»éÿçVv¥Õ!∏.£rçr¥Õ!Z<tÎê¥Îê.ΔLrE√.ã>πq.ãªq∞ .àGIɢ~ÎÙê√